Option Explicit
'ThisWorkbookҲ
Private Sub Workbook_Deactivate()
    MsgBox Me.Name & "wgOActive]ҥΡ^AFC"
End Sub
